Imports System.Collections.Generic
Imports System.ComponentModel
Imports System.Data
Imports System.Drawing
Imports System.Linq
Imports System.Text
Imports System.Windows.Forms
Imports System.Collections

Public Partial Class FrmObras
	Inherits Form
	Private modificar As Boolean = False
	'variable para diferenciar si se modifica(true) o es un nuevo cliente(false)

	Public Sub New()
		'al iniciar la pantalla carga todos los combos
		InitializeComponent()
		cargarComboBarrio()
		cargarComboLocalid()
		desabilitarCombos()

		cargarGrilla()
	End Sub

	Public Sub New(modif As Boolean)
		'constructor para saber si se modifica un cliente o se carga uno nuevo
		'al iniciar la pantalla carga todos los combos
		InitializeComponent()
		cargarComboBarrio()
		cargarComboLocalid()
		desabilitarCombos()

		cargarGrilla()
			'mando x parametro si modifico (true) o guardo uno nuevo (false)
		modificar = modif
	End Sub

	Private Sub desabilitarCombos()
	'desabililito combos al iniciar el form
		'hacer

	End Sub

	Private Sub habilitarCombosCliente()
	'habilita los combos
		'hacer 
	End Sub



	Private Sub btnMasBarrio_Click(sender As Object, e As EventArgs)
	
	End Sub

	Private Sub btnMasLocal_Click(sender As Object, e As EventArgs)
	'metodo que llama al form Localidad
        Dim gene As New FrmLocalidad
        gene.ShowDialog()
	End Sub

	Private Sub cargarComboBarrio()
	'metodo que carga el combo barrio
		
	End Sub
	Private Sub cargarComboLocalid()
	'metodo que carga el combo localidad
		
	End Sub



	'evento para q solo se ingrese numero en numero,piso y depto
	Private Sub txtNroCalle_KeyPress(sender As Object, e As KeyPressEventArgs)
		If [Char].IsDigit(e.KeyChar) Then
			e.Handled = False
		ElseIf [Char].IsControl(e.KeyChar) Then
			e.Handled = False
		ElseIf [Char].IsSeparator(e.KeyChar) Then
			e.Handled = False
		Else
			e.Handled = True
		End If
	End Sub

	Private Sub btnAceptar_Click(sender As Object, e As EventArgs)
	'evento q guarda los datos
		'hacer
	End Sub

	Private Sub btnNuevo_Click(sender As Object, e As EventArgs)
	'al hacer nuevo te trae el ultimo id
		'hacer
	End Sub

	Private Sub btnCancelar_Click(sender As Object, e As EventArgs)
		Me.Close()
	End Sub


	Private Sub limpiarForm()
	'limpio la pantalla
		'agregar los campos q faltan
		txtDepto.Text = ""
		txtCalle.Text = ""
		txtCP.Text = ""

		txtNroCalle.Text = ""

		txtObserGral.Text = ""
		txtPiso.Text = ""
		txtRazonSocial.Text = ""

		dataGridView2.DataSource = Nothing

	End Sub



	Private Sub cargarGrilla()
	'carga la grilla con todos las obras
		'hacer

	End Sub


	Private Sub btnAgregar_Click(sender As Object, e As EventArgs)
	'evento que agrega clientes
		'hacer
	End Sub
	'evento q al hacer doble click en las obras te cargan los datos para modificarlos
	Private Sub dataGridView1_CellDoubleClick(sender As Object, e As DataGridViewCellEventArgs)
		modificar = True
		'al hacer doble click en la grilla pongo la bandera en true para saber q voy a modificar.
		'hacer
	End Sub



	Private Sub cargarFormObras(nro As Integer)
	'metodo para cargar una Obra cuando hago double click en la grilla
		'hacer
	End Sub


End Class
